home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00187_EFECTOARMARIO.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  1.0 KB  |  34 lines
  1. on efectoarmario
  2.   global Punto, Sala, Niv
  3.   set the visible of sprite 16 to 1
  4.   if Punto = 37 then
  5.     preLoad(label("A" & Niv & "11"), label("A" & Niv & "11") + 7)
  6.     go(label("A" & Niv & "11"))
  7.   else
  8.     if Punto = 53 then
  9.       preLoad(label("A" & Niv & "12"), label("A" & Niv & "12") + 7)
  10.       go(label("A" & Niv & "12"))
  11.     else
  12.       if Punto = 94 then
  13.         preLoad(label("A" & Niv & "13"), label("A" & Niv & "13") + 7)
  14.         go(label("A" & Niv & "13"))
  15.       else
  16.         if Punto = 232 then
  17.           preLoad(label("A" & Niv & "14"), label("A" & Niv & "14") + 7)
  18.           go(label("A" & Niv & "14"))
  19.         else
  20.           if Punto = 272 then
  21.             preLoad(label("A" & Niv & "15"), label("A" & Niv & "15") + 7)
  22.             go(label("A" & Niv & "15"))
  23.           else
  24.             if Punto = 289 then
  25.               preLoad(label("A" & Niv & "16"), label("A" & Niv & "16") + 7)
  26.               go(label("A" & Niv & "16"))
  27.             end if
  28.           end if
  29.         end if
  30.       end if
  31.     end if
  32.   end if
  33. end
  34.